home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Disc Station 15
/
Disc Station Vol 15.BIN
/
menu
/
startup.bak
< prev
next >
Wrap
Text File
|
1997-05-02
|
55KB
|
1,852 lines
; TAB 4
;+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
; éciscértasion Vol.15 âüâjâàü[ü^âCâôâXâgü[âëü[âVü[âPâôâX
; DSmenu installer controler 'Artysia' menu version
; 1996 Programed by Nozomi
; 1997 Edit by HAMA-VX
;+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
;/////////////////////////////////////
;
; âCâôâXâgü[âïëµû╩é╠ôoÿ^
;
;/////////////////////////////////////
@Effect 20, 245, 8
@sndload DSmenu.mlk
$snd = 0
$mode = 4
@snd $snd
@pcmload DSmenu.wlk
@INSTgrp popup15, (20, 12),20 ; âCâôâXâgü[âïÄ₧é╔ò\Īé╖éΘâOâëâtâBâbâNé╠âìü[âh
@INSTmater mater15, 34, 3,20 ; âCâôâXâgü[âïÅ≤æ╘é╠ò\Īâüü[â^ü[é╠âìü[âh
@INSTmaterSet (3, 25) ; âüü[â^ü[é╠ò\Īê╩Æu
@INSTchr puyo15, 8, 7,20,20 ; âüü[â^ü[Åπé≡ô«é¡âLâââëé╠âìü[âh
@INSTchrSet 0, 3, 0, 2, 1, 3, 4, 2, 1 ; âAâjâüÉ▌ÆΦ ê┌ô«Æå
@INSTchrSet 1, 3, 0, 2, 1, 3, 4, 2, 1 ; âAâjâüÉ▌ÆΦ ÅIù╣
@INSTmess instme15, (0, 1), 40, 4, 20,20 ; âCâôâXâgü[âïÆåé╚é╟é╠âüâbâZü[âWé╠âìü[âh
@INSTmessSet 0, 12, 0 ; âCâôâXâgü[âïÆå
@INSTmessSet 1, 12, 1 ; âCâôâXâgü[âïÅIù╣
@INSTmessSet 2, 12, 2 ; âAâôâCâôâXâgü[âïÆå
@INSTmessSet 3, 12, 3 ; âAâôâCâôâXâgü[âïÅIù╣
@INSTmessSet 4, 12, 4 ; âZü[âuâfü[â^æ▐ö≡Æå
@INSTmessSet 5, 12, 5 ; âZü[âuâfü[â^æ▐ö≡ÅIù╣
@INSTmessSet 6, 12, 6 ; âZü[âuâfü[â^ò£î│Æå
@INSTmessSet 7, 12, 7 ; âZü[âuâfü[â^ò£î│ÅIù╣
@INSTmessSet 8, 12, 8 ; âüâjâàü[âCâôâXâgü[âïÆå
@INSTmessSet 9, 12, 9 ; âüâjâàü[âCâôâXâgü[âïÅIù╣
@INSTmodeLoad mode15, (20, 0), 40, 4,20,20 ; âéü[âhò\Īùpébéfâìü[âh
@INSTmodeSet 0, 1, 1 ; âCâôâXâgü[âïâéü[âh
@INSTmodeSet 1, 1, 3 ; âQü[âÇâfü[â^æ▐ö≡âéü[âh
@INSTmodeSet 2, 1, 4 ; âQü[âÇâfü[â^ò£î│âéü[âh
@INSTmodeSet 3, 1, 2 ; âAâôâCâôâXâgü[âïâéü[âh
@INSTmodeSet 4, 1, 0 ; ïNô«âéü[âh
;//////////////////////////////////////////////////////////////////
;
; âVâXâeâÇÅεò±é╠É▌ÆΦ
;
;/////////////////////////////////////////////////////////////////
@SYSinstDir DiscStation15 ; âCâôâXâgü[âïâfâBâîâNâgâè
@SYSCDvolume DS15 ; ébécé╠â{âèâàü[âÇâëâxâï
@SYSappName DiscStation15 ; âAâvâèâPü[âVâçâôû╝
@SYSregKey DS15 ; âîâWâXâgâèâLü[û╝
@SYSuninst DSshell.exe ; âAâôâCâôâXâgü[âëü[
;@SYSdrvType CD, HD ; âCâôâXâgü[âïî│ü^ɵé╠âhâëâCâué╠Äφù▐ Ä⌐ô«îƒì⌡é╡é▄é╖
@SYSdrvType MO, HD ; âCâôâXâgü[âïî│ü^ɵé╠âhâëâCâué╠Äφù▐ Ä⌐ô«îƒì⌡é╡é▄é╖
@SYSmenuName écérâüâjâàü[ ; âüâjâàü[û╝ âXâ^ü[âgâüâjâàü[é╔ò\Īé│éΩéΘ
@SYSmenuPath InstMenu ; ébécôαé╠âüâjâàü[é╠éáéΘâfâBâîâNâgâè
@SYSmenu DSshell.exe ; âüâjâàü[ïNô«âvâìâOâëâÇ
@SYSload sysico15, 13, 11,20,20 ; âVâXâeâÇâAâCâRâôé╠âìü[âh
@DRAWdisable ; ò`ëµï╓Ä~
@LOGOload logo15, 24, 8,20,20 ; âQü[âÇâ^âCâgâïé╠âìü[âh
@MENUload DSgame15, 13, 11,20,20 ; âQü[âÇé╠âAâCâRâôé╠âìü[âh
@Wall main15 ,20 ; ò╟Äåâìü[âh
@GOSUB :sysiconinit ; âVâXâeâÇâAâCâRâôé╠É▌ÆΦ
@GOSUB :gameinit ; âQü[âÇâfü[â^é╠É▌ÆΦ
@DRAWenable ; ò`ëµïûë┬
$start = 0
;//////////////////////////////////////////////////////////////////////
;
; âüâCâôâïü[âv
;
;/////////////////////////////////////////////////////////////////////
:init
@DRAWdisable ; ò`ëµï╓Ä~
@INSTmode $mode ; âüâjâàü[âéü[âhé╠ò\Ī
@GOSUB :sysiconset ; âVâXâeâÇâAâCâRâôé╠ò\Ī
; âQü[âÇâAâCâRâôé╠ò\Īü^É▌ÆΦ
@GOSUB :FloatSetInst ;âtâìü[âgâëâôâhé¿é╞é¼é╬é╚é╡é╠âAâCâRâôò\Īü^É▌ÆΦé╓
@GOSUB :HeartSetInst ;é╠ü[âRâlânü[âgâëâôâhé╠âAâCâRâôò\Īü^É▌ÆΦé╓
@GOSUB :MujinSetInst ;é┌é¡éτé╠û│Élôçé╠âAâCâRâôò\Īü^É▌ÆΦé╓
@GOSUB :LoginSetInst ;âìâOâCâôèΘëµé╠âAâCâRâôò\Īü^É▌ÆΦé╓
@GOSUB :Jump3SetInst ;âWâââôâvâqü[âìü[èOô`éRé╠ò\Īü^É▌ÆΦé╓
@GOSUB :PacifishSetInst ;æσèCæNé╠âAâCâRâôò\Īü^É▌ÆΦé╓
@GOSUB :NpSetInst ;é╚é╝é╒éµé╠âAâCâRâôò\Īü^É▌ÆΦé╓
@GOSUB :AnimeSetInst ;âAâjâüé╠âAâCâRâôò\Īü^É▌ÆΦé╓
@GOSUB :MovieSetInst ;âÇü[ârü[é╠âAâCâRâôò\Īü^É▌ÆΦé╓
@IF $start != 0 :loopA
@DRAWenable ; ò`ëµïûë┬
@Effect 20, 245, 10
$start = 1
:loopA
@DRAWenable ; ò`ëµïûë┬
:loop ; é▒é╠éQìsé≡ëäüXé╞ë±éΦæ▒é»é▄é╖ é╜é╛ëäüXé╞üEüEüE
@ICONenable
@Goto :loop ; üié╜é╛é╡üAâAâCâRâôé≡âNâèâbâNé╖éΘé▄é┼üj
:exec
@IF $mode == 4 :loop
@pcm 0
$mode = 4 ; ïNô«âéü[âh
@GOTO :init
:inst
@IF $mode == 0 :loop
@pcm 0
$mode = 0 ; âCâôâXâgü[âïâéü[âh
@GOTO :init
:store
@IF $mode == 1 :loop
@pcm 0
$mode = 1 ; âQü[âÇâfü[â^æ▐ö≡âéü[âh
@GOTO :init
:restore
@IF $mode == 2 :loop
@pcm 0
$mode = 2 ; âQü[âÇâfü[â^ò£î│âéü[âh
@GOTO :init
:uninst
@IF $mode == 3 :loop
@pcm 0
$mode = 3 ; âAâôâCâôâXâgü[âïâéü[âh
@GOTO :init
:exit
@pcm 0
@END ; écérâüâjâàü[é╠ÅIù╣
;///////////////////////////////////////////////////////////////////////
;
; âVâXâeâÇâAâCâRâôé╠É▌ÆΦ
;
;//////////////////////////////////////////////////////////////////////
:sysiconinit
@MENUset exec(0),1, 5, 0 ; ébécïNô«âAâCâRâôé╠É▌ÆΦ
@MENUset exec(1),1, 5, 6 ; ébécïNô«âAâCâRâôé╠É▌ÆΦ
@MENUlogoSet (28, 40), 19 ; ébécïNô«âìâSé╠ê╩ÆuÉ▌ÆΦ
@MENUset inst(0), 1, 5, 1 ; âCâôâXâgü[âïâAâCâRâôé╠É▌ÆΦ
@MENUset inst(1), 1, 5, 7 ; âCâôâXâgü[âïâAâCâRâôé╠É▌ÆΦ
@MENUlogoSet (28, 40), 20 ; âCâôâXâgü[âïâìâSé╠ê╩ÆuÉ▌ÆΦ
@MENUset uninst(0), 1, 5, 2 ; âAâôâCâôâXâgü[âïâAâCâRâôé╠É▌ÆΦ
@MENUset uninst(1), 1, 5, 8 ; âAâôâCâôâXâgü[âïâAâCâRâôé╠É▌ÆΦ
@MENUlogoSet (28, 40), 21 ; âAâôâCâôâXâgü[âïâìâSé╠ê╩ÆuÉ▌ÆΦ
@MENUset store(0), 1, 5, 3 ; æ▐ö≡âAâCâRâôé╠É▌ÆΦ
@MENUset store(1), 1, 5, 9 ; æ▐ö≡âAâCâRâôé╠É▌ÆΦ
@MENUlogoSet (28, 40), 22 ; æ▐ö≡âìâSé╠ê╩ÆuÉ▌ÆΦ
@MENUset restore(0), 1, 5, 4 ; ò£î│âAâCâRâôé╠É▌ÆΦ
@MENUset restore(1), 1, 5, 10 ; ò£î│âAâCâRâôé╠É▌ÆΦ
@MENUlogoSet (28, 40), 23 ; ò£î│âìâSé╠ê╩ÆuÉ▌ÆΦ
@MENUset exit(0), 1, 5, 5 ; ÅIù╣âAâCâRâôé╠É▌ÆΦ
@MENUlogoSet (28, 40), 24 ; ÅIù╣âìâSé╠ê╩ÆuÉ▌ÆΦ
@RET
:sysiconset
@IF $mode == 4 :exec1
@MENUput exec(0), (1, 48) ; ïNô«âAâCâRâôé╠ò\Ī
@Goto :exec2
:exec1
@MENUput exec(1), (1, 48) ; ïNô«âAâCâRâôé╠ò\Ī
:exec2
@MENUlogo exec, 0 ; ò\Īé╖éΘâìâSé╠ÄwÆΦ
@MENUgoto exec, :exec ; âNâèâbâNÄ₧é╠ö≥é╤ɵ
@IF $mode == 0 :inst1
@MENUput inst(0), (14, 48) ; âCâôâXâgü[âïâAâCâRâôé╠ò\Ī
@Goto :inst2
:inst1
@MENUput inst(1), (14, 48) ; âCâôâXâgü[âïâAâCâRâôé╠ò\Ī
:inst2
@MENUlogo inst, 0 ; ò\Īé╖éΘâìâSé╠ÄwÆΦ
@MENUgoto inst, :inst ; âNâèâbâNÄ₧é╠ö≥é╤ɵ
@IF $mode == 3 :uninst1
@MENUput uninst(0), (27, 48) ; âAâôâCâôâXâgü[âïâAâCâRâôé╠ò\Ī
@Goto :uninst2
:uninst1
@MENUput uninst(1), (27, 48) ; âAâôâCâôâXâgü[âïâAâCâRâôé╠ò\Ī
:uninst2
@MENUlogo uninst, 0 ; ò\Īé╖éΘâìâSé╠ÄwÆΦ
@MENUgoto uninst, :uninst ; âNâèâbâNÄ₧é╠ö≥é╤ɵ
@IF $mode == 1 :store1
@MENUput store(0), (40, 48) ; æ▐ö≡âAâCâRâôé╠ò\Ī
@Goto :store2
:store1
@MENUput store(1), (40, 48) ; æ▐ö≡âAâCâRâôé╠ò\Ī
:store2
@MENUlogo store, 0 ; ò\Īé╖éΘâìâSé╠ÄwÆΦ
@MENUgoto store, :store ; âNâèâbâNÄ₧é╠ö≥é╤ɵ
@IF $mode == 2 :restore1
@MENUput restore(0), (53, 48) ; ò£î│âAâCâRâôé╠ò\Ī
@Goto :restore2
:restore1
@MENUput restore(1), (53, 48) ; ò£î│âAâCâRâôé╠ò\Ī
:restore2
@MENUlogo restore, 0 ; ò\Īé╖éΘâìâSé╠ÄwÆΦ
@MENUgoto restore, :restore ; âNâèâbâNÄ₧é╠ö≥é╤ɵ
@MENUput exit(0), (66, 48) ; ÅIù╣âAâCâRâôé╠ò\Ī
@MENUlogo exit, 0 ; ò\Īé╖éΘâìâSé╠ÄwÆΦ
@MENUgoto exit, :exit ; âNâèâbâNÄ₧é╠ö≥é╤ɵ
@MENUdisp store, 1 ; storeâìâSé≡ò\Ī ûóÄgùp
@MENUdisp restore, 1 ; storeâìâSé≡ò\Ī ûóÄgùp
@MENUdisp inst, 1 ; storeâìâSé≡ò\Ī ûóÄgùp
@MENUdisp uninst, 1 ; storeâìâSé≡ò\Ī ûóÄgùp
@RET
;////////////////////////////////////////////////////////////////////////
;
; âQü[âÇâAâCâRâôü^Åεò±é╠É▌ÆΦ
;
;////////////////////////////////////////////////////////////////////////
:gameinit
;é╠ü[âRâlânü[âgâëâôâhÉ▌ÆΦ
@MENUset Heart(0), 0, 3,27,28,29,28,27 ; âQü[âÇâAâCâRâôé╠É▌ÆΦ Æ╩Åφ
@MENUset Heart(2), 0, 3,45,46,47,46,45 ; âQü[âÇâAâCâRâôé╠É▌ÆΦ æIæ